home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-1.iso / Files / Educ / Health-Food / Recipe 1.1 Demo.sit / Recipe Master Demo / Recipe Master Demo / card_17119.txt < prev    next >
Encoding:
Text File  |  1994-08-09  |  15.2 KB  |  752 lines
  1. -- card: 17119 from stack: in
  2. -- bmap block id: 17778
  3. -- flags: 0000
  4. -- background id: 11832
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   put empty into card field "Display"
  9.   put empty into card field id 27
  10.   click at loc of card field "Display"
  11. end openCard
  12.  
  13.  
  14. -- part 1 (field)
  15. -- low flags: 00
  16. -- high flags: 0002
  17. -- rect: left=97 top=59 right=77 bottom=244
  18. -- title width / last selected line: 0
  19. -- icon id / first selected line: 0 / 0
  20. -- text alignment: 65535
  21. -- font id: 3
  22. -- text size: 12
  23. -- style flags: 0
  24. -- line height: 16
  25. -- part name: Display
  26.  
  27.  
  28. -- part 2 (button)
  29. -- low flags: 00
  30. -- high flags: A004
  31. -- rect: left=98 top=252 right=271 bottom=120
  32. -- title width / last selected line: 0
  33. -- icon id / first selected line: 0 / 0
  34. -- text alignment: 1
  35. -- font id: 0
  36. -- text size: 12
  37. -- style flags: 0
  38. -- line height: 16
  39. -- part name: 1
  40. ----- HyperTalk script -----
  41. on mouseUp
  42.   put 1 after card field "Display"
  43. end mouseUp
  44.  
  45.  
  46.  
  47. -- part 3 (button)
  48. -- low flags: 00
  49. -- high flags: A004
  50. -- rect: left=139 top=253 right=272 bottom=161
  51. -- title width / last selected line: 0
  52. -- icon id / first selected line: 0 / 0
  53. -- text alignment: 1
  54. -- font id: 0
  55. -- text size: 12
  56. -- style flags: 0
  57. -- line height: 16
  58. -- part name: 2
  59. ----- HyperTalk script -----
  60. on mouseUp
  61.   put 2 after card field "Display"
  62. end mouseUp
  63.  
  64.  
  65.  
  66. -- part 4 (button)
  67. -- low flags: 00
  68. -- high flags: A004
  69. -- rect: left=177 top=254 right=273 bottom=199
  70. -- title width / last selected line: 0
  71. -- icon id / first selected line: 0 / 0
  72. -- text alignment: 1
  73. -- font id: 0
  74. -- text size: 12
  75. -- style flags: 0
  76. -- line height: 16
  77. -- part name: 3
  78. ----- HyperTalk script -----
  79. on mouseUp
  80.   put 3 after card field "Display"
  81. end mouseUp
  82.  
  83.  
  84.  
  85. -- part 5 (button)
  86. -- low flags: 00
  87. -- high flags: A004
  88. -- rect: left=99 top=222 right=241 bottom=121
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 1
  92. -- font id: 0
  93. -- text size: 12
  94. -- style flags: 0
  95. -- line height: 16
  96. -- part name: 4
  97. ----- HyperTalk script -----
  98. on mouseUp
  99.   put 4 after card field "Display"
  100. end mouseUp
  101.  
  102.  
  103.  
  104. -- part 6 (button)
  105. -- low flags: 00
  106. -- high flags: A004
  107. -- rect: left=139 top=223 right=242 bottom=161
  108. -- title width / last selected line: 0
  109. -- icon id / first selected line: 0 / 0
  110. -- text alignment: 1
  111. -- font id: 0
  112. -- text size: 12
  113. -- style flags: 0
  114. -- line height: 16
  115. -- part name: 5
  116. ----- HyperTalk script -----
  117. on mouseUp
  118.   put 5 after card field "Display"
  119. end mouseUp
  120.  
  121.  
  122.  
  123. -- part 7 (button)
  124. -- low flags: 00
  125. -- high flags: A004
  126. -- rect: left=177 top=224 right=243 bottom=199
  127. -- title width / last selected line: 0
  128. -- icon id / first selected line: 0 / 0
  129. -- text alignment: 1
  130. -- font id: 0
  131. -- text size: 12
  132. -- style flags: 0
  133. -- line height: 16
  134. -- part name: 6
  135. ----- HyperTalk script -----
  136. on mouseUp
  137.   put 6 after card field "Display"
  138. end mouseUp
  139.  
  140.  
  141.  
  142. -- part 8 (button)
  143. -- low flags: 00
  144. -- high flags: A004
  145. -- rect: left=99 top=196 right=215 bottom=121
  146. -- title width / last selected line: 0
  147. -- icon id / first selected line: 0 / 0
  148. -- text alignment: 1
  149. -- font id: 0
  150. -- text size: 12
  151. -- style flags: 0
  152. -- line height: 16
  153. -- part name: 7
  154. ----- HyperTalk script -----
  155. on mouseUp
  156.   put 7 after card field "Display"
  157. end mouseUp
  158.  
  159.  
  160.  
  161. -- part 9 (button)
  162. -- low flags: 00
  163. -- high flags: A004
  164. -- rect: left=139 top=196 right=215 bottom=161
  165. -- title width / last selected line: 0
  166. -- icon id / first selected line: 0 / 0
  167. -- text alignment: 1
  168. -- font id: 0
  169. -- text size: 12
  170. -- style flags: 0
  171. -- line height: 16
  172. -- part name: 8
  173. ----- HyperTalk script -----
  174. on mouseUp
  175.   put 8 after card field "Display"
  176. end mouseUp
  177.  
  178.  
  179.  
  180. -- part 10 (button)
  181. -- low flags: 00
  182. -- high flags: A004
  183. -- rect: left=177 top=197 right=216 bottom=199
  184. -- title width / last selected line: 0
  185. -- icon id / first selected line: 0 / 0
  186. -- text alignment: 1
  187. -- font id: 0
  188. -- text size: 12
  189. -- style flags: 0
  190. -- line height: 16
  191. -- part name: 9
  192. ----- HyperTalk script -----
  193. on mouseUp
  194.   put 9 after card field "Display"
  195. end mouseUp
  196.  
  197.  
  198.  
  199. -- part 11 (button)
  200. -- low flags: 00
  201. -- high flags: A004
  202. -- rect: left=98 top=280 right=300 bottom=122
  203. -- title width / last selected line: 0
  204. -- icon id / first selected line: 0 / 0
  205. -- text alignment: 1
  206. -- font id: 0
  207. -- text size: 12
  208. -- style flags: 0
  209. -- line height: 16
  210. -- part name: 0
  211. ----- HyperTalk script -----
  212. on mouseUp
  213.   put 0 after card field "Display"
  214. end mouseUp
  215.  
  216.  
  217.  
  218. -- part 12 (button)
  219. -- low flags: 00
  220. -- high flags: A004
  221. -- rect: left=139 top=279 right=299 bottom=163
  222. -- title width / last selected line: 0
  223. -- icon id / first selected line: 0 / 0
  224. -- text alignment: 1
  225. -- font id: 0
  226. -- text size: 12
  227. -- style flags: 0
  228. -- line height: 16
  229. -- part name: .
  230. ----- HyperTalk script -----
  231. on mouseUp
  232.   put "." after card field "Display"
  233. end mouseUp
  234.  
  235.  
  236.  
  237. -- part 13 (button)
  238. -- low flags: 00
  239. -- high flags: A004
  240. -- rect: left=177 top=280 right=300 bottom=201
  241. -- title width / last selected line: 0
  242. -- icon id / first selected line: 0 / 0
  243. -- text alignment: 1
  244. -- font id: 0
  245. -- text size: 12
  246. -- style flags: 0
  247. -- line height: 16
  248. -- part name: C
  249. ----- HyperTalk script -----
  250. on mouseUp
  251.   put empty into card field "Display"
  252.   put empty into card field 2
  253. end mouseUp
  254.  
  255.  
  256.  
  257. -- part 14 (button)
  258. -- low flags: 00
  259. -- high flags: A004
  260. -- rect: left=87 top=139 right=161 bottom=148
  261. -- title width / last selected line: 0
  262. -- icon id / first selected line: 0 / 0
  263. -- text alignment: 1
  264. -- font id: 0
  265. -- text size: 12
  266. -- style flags: 0
  267. -- line height: 16
  268. -- part name: g to oz
  269. ----- HyperTalk script -----
  270. on mouseUp
  271.   get card field "Display"
  272.   set numberFormat to 00.00
  273.   put it * .03527336861 into card field "Display"
  274.   put "oz" into card field 2
  275. end mouseUp
  276.  
  277.  
  278.  
  279. -- part 15 (button)
  280. -- low flags: 00
  281. -- high flags: A004
  282. -- rect: left=87 top=166 right=188 bottom=148
  283. -- title width / last selected line: 0
  284. -- icon id / first selected line: 0 / 0
  285. -- text alignment: 1
  286. -- font id: 0
  287. -- text size: 12
  288. -- style flags: 0
  289. -- line height: 16
  290. -- part name: oz to g
  291. ----- HyperTalk script -----
  292. on mouseUp
  293.   get card field "Display"
  294.   set numberFormat to 00.00
  295.   put it * 28.35 into card field "Display"
  296.   put "g" into card field 2
  297. end mouseUp
  298.  
  299.  
  300.  
  301. -- part 20 (button)
  302. -- low flags: 00
  303. -- high flags: 2000
  304. -- rect: left=464 top=309 right=335 bottom=496
  305. -- title width / last selected line: 0
  306. -- icon id / first selected line: 2162 / 2162
  307. -- text alignment: 1
  308. -- font id: 0
  309. -- text size: 12
  310. -- style flags: 0
  311. -- line height: 16
  312. -- part name: Return
  313. ----- HyperTalk script -----
  314. on mouseUp
  315.   pop card
  316. end mouseUp
  317.  
  318.  
  319.  
  320. -- part 21 (button)
  321. -- low flags: 00
  322. -- high flags: A004
  323. -- rect: left=159 top=140 right=160 bottom=234
  324. -- title width / last selected line: 0
  325. -- icon id / first selected line: 0 / 0
  326. -- text alignment: 1
  327. -- font id: 0
  328. -- text size: 12
  329. -- style flags: 0
  330. -- line height: 16
  331. -- part name: ml to fl oz
  332. ----- HyperTalk script -----
  333. on mouseUp
  334.   get card field "Display"
  335.   set numberFormat to 00.00
  336.   put it * .034 into card field "Display"
  337.   put "oz" into card field 2
  338. end mouseUp
  339.  
  340.  
  341.  
  342. -- part 22 (button)
  343. -- low flags: 00
  344. -- high flags: A004
  345. -- rect: left=159 top=167 right=187 bottom=234
  346. -- title width / last selected line: 0
  347. -- icon id / first selected line: 0 / 0
  348. -- text alignment: 1
  349. -- font id: 0
  350. -- text size: 12
  351. -- style flags: 0
  352. -- line height: 16
  353. -- part name: fl oz to ml
  354. ----- HyperTalk script -----
  355. on mouseUp
  356.   get card field "Display"
  357.   set numberFormat to 00.00
  358.   put it * 29.575 into card field "Display"
  359.   put "ml" into card field 2
  360. end mouseUp
  361.  
  362.  
  363.  
  364. -- part 23 (button)
  365. -- low flags: 00
  366. -- high flags: A004
  367. -- rect: left=240 top=140 right=160 bottom=319
  368. -- title width / last selected line: 0
  369. -- icon id / first selected line: 0 / 0
  370. -- text alignment: 1
  371. -- font id: 0
  372. -- text size: 12
  373. -- style flags: 0
  374. -- line height: 16
  375. -- part name: tsp to fl oz
  376. ----- HyperTalk script -----
  377. on mouseUp
  378.   get card field "Display"
  379.   set numberFormat to 00.00
  380.   put it / 6 into card field "Display"
  381.   put "oz" into card field 2
  382. end mouseUp
  383.  
  384.  
  385.  
  386. -- part 24 (button)
  387. -- low flags: 00
  388. -- high flags: A004
  389. -- rect: left=240 top=168 right=188 bottom=319
  390. -- title width / last selected line: 0
  391. -- icon id / first selected line: 0 / 0
  392. -- text alignment: 1
  393. -- font id: 0
  394. -- text size: 12
  395. -- style flags: 0
  396. -- line height: 16
  397. -- part name: fl oz to tsp
  398. ----- HyperTalk script -----
  399. on mouseUp
  400.   get card field "Display"
  401.   set numberFormat to 00.00
  402.   put it * 6 into card field "Display"
  403.   put "tsp" into card field 2
  404. end mouseUp
  405.  
  406.  
  407.  
  408. -- part 25 (button)
  409. -- low flags: 00
  410. -- high flags: A004
  411. -- rect: left=240 top=196 right=216 bottom=319
  412. -- title width / last selected line: 0
  413. -- icon id / first selected line: 0 / 0
  414. -- text alignment: 1
  415. -- font id: 0
  416. -- text size: 12
  417. -- style flags: 0
  418. -- line height: 16
  419. -- part name: tsp to Tbsp
  420. ----- HyperTalk script -----
  421. on mouseUp
  422.   get card field "Display"
  423.   set numberFormat to 00.00
  424.   put it / 3 into card field "Display"
  425.   put "Tbsp" into card field 2
  426. end mouseUp
  427.  
  428.  
  429.  
  430. -- part 26 (button)
  431. -- low flags: 00
  432. -- high flags: A004
  433. -- rect: left=240 top=224 right=244 bottom=319
  434. -- title width / last selected line: 0
  435. -- icon id / first selected line: 0 / 0
  436. -- text alignment: 1
  437. -- font id: 0
  438. -- text size: 12
  439. -- style flags: 0
  440. -- line height: 16
  441. -- part name: Tbsp to tsp
  442. ----- HyperTalk script -----
  443. on mouseUp
  444.   get card field "Display"
  445.   set numberFormat to 00.00
  446.   put it * 3 into card field "Display"
  447.   put "tsp" into card field 2
  448. end mouseUp
  449.  
  450.  
  451.  
  452. -- part 27 (field)
  453. -- low flags: 00
  454. -- high flags: 0002
  455. -- rect: left=247 top=59 right=77 bottom=294
  456. -- title width / last selected line: 0
  457. -- icon id / first selected line: 0 / 0
  458. -- text alignment: 0
  459. -- font id: 3
  460. -- text size: 12
  461. -- style flags: 0
  462. -- line height: 16
  463. -- part name: 
  464.  
  465.  
  466. -- part 28 (button)
  467. -- low flags: 00
  468. -- high flags: A004
  469. -- rect: left=210 top=253 right=273 bottom=234
  470. -- title width / last selected line: 0
  471. -- icon id / first selected line: 0 / 0
  472. -- text alignment: 1
  473. -- font id: 0
  474. -- text size: 12
  475. -- style flags: 0
  476. -- line height: 16
  477. -- part name: +
  478. ----- HyperTalk script -----
  479. on mouseUp
  480.   get card field id 1
  481.   if last char of it is in "+-/*" then
  482.     beep
  483.     exit mouseUp
  484.   else
  485.     put "+" after card field id 1
  486.   end if
  487. end mouseUp
  488.  
  489.  
  490.  
  491. -- part 29 (button)
  492. -- low flags: 00
  493. -- high flags: A004
  494. -- rect: left=210 top=280 right=300 bottom=234
  495. -- title width / last selected line: 0
  496. -- icon id / first selected line: 0 / 0
  497. -- text alignment: 1
  498. -- font id: 0
  499. -- text size: 12
  500. -- style flags: 0
  501. -- line height: 16
  502. -- part name: -
  503. ----- HyperTalk script -----
  504. on mouseUp
  505.   get card field id 1
  506.   if last char of it is in "+-/*" then
  507.     beep
  508.     exit mouseUp
  509.   else
  510.     put "-" after card field id 1
  511.   end if
  512. end mouseUp
  513.  
  514.  
  515.  
  516. -- part 30 (button)
  517. -- low flags: 00
  518. -- high flags: A004
  519. -- rect: left=208 top=197 right=216 bottom=233
  520. -- title width / last selected line: 0
  521. -- icon id / first selected line: 0 / 0
  522. -- text alignment: 1
  523. -- font id: 0
  524. -- text size: 12
  525. -- style flags: 0
  526. -- line height: 16
  527. -- part name: *
  528. ----- HyperTalk script -----
  529. on mouseUp
  530.   get card field id 1
  531.   if last char of it is in "+-/*" then
  532.     beep
  533.     exit mouseUp
  534.   else
  535.     put "*" after card field id 1
  536.   end if
  537. end mouseUp
  538.  
  539.  
  540.  
  541. -- part 31 (button)
  542. -- low flags: 00
  543. -- high flags: A004
  544. -- rect: left=209 top=224 right=243 bottom=233
  545. -- title width / last selected line: 0
  546. -- icon id / first selected line: 0 / 0
  547. -- text alignment: 1
  548. -- font id: 0
  549. -- text size: 12
  550. -- style flags: 0
  551. -- line height: 16
  552. -- part name: /
  553. ----- HyperTalk script -----
  554. on mouseUp
  555.   get card field id 1
  556.   if last char of it is in "+-/*" then
  557.     beep
  558.     exit mouseUp
  559.   else
  560.     put "/" after card field id 1
  561.   end if
  562. end mouseUp
  563.  
  564.  
  565.  
  566. -- part 32 (button)
  567. -- low flags: 00
  568. -- high flags: A004
  569. -- rect: left=254 top=258 right=293 bottom=300
  570. -- title width / last selected line: 0
  571. -- icon id / first selected line: 0 / 0
  572. -- text alignment: 1
  573. -- font id: 0
  574. -- text size: 12
  575. -- style flags: 0
  576. -- line height: 16
  577. -- part name: =
  578. ----- HyperTalk script -----
  579. on mouseUp
  580.   get card field id 1
  581.   if last char of it is not in "1234567890" then exit mouseUp
  582.   put value of it into card field id 1
  583. end mouseUp
  584.  
  585.  
  586.  
  587. -- part 34 (field)
  588. -- low flags: 01
  589. -- high flags: 0004
  590. -- rect: left=334 top=64 right=279 bottom=504
  591. -- title width / last selected line: 0
  592. -- icon id / first selected line: 0 / 0
  593. -- text alignment: 0
  594. -- font id: 3
  595. -- text size: 12
  596. -- style flags: 256
  597. -- line height: 16
  598. -- part name: 
  599.  
  600.  
  601. -- part 35 (button)
  602. -- low flags: 00
  603. -- high flags: A004
  604. -- rect: left=87 top=84 right=106 bottom=148
  605. -- title width / last selected line: 0
  606. -- icon id / first selected line: 0 / 0
  607. -- text alignment: 1
  608. -- font id: 0
  609. -- text size: 12
  610. -- style flags: 0
  611. -- line height: 16
  612. -- part name: qts to l
  613. ----- HyperTalk script -----
  614. on mouseUp
  615.   get card field "Display"
  616.   set numberFormat to 00.00
  617.   put it / 1.057 into card field "Display"
  618.   put "l" into card field 2
  619. end mouseUp
  620.  
  621.  
  622.  
  623. -- part 36 (button)
  624. -- low flags: 00
  625. -- high flags: A004
  626. -- rect: left=155 top=84 right=106 bottom=240
  627. -- title width / last selected line: 0
  628. -- icon id / first selected line: 0 / 0
  629. -- text alignment: 1
  630. -- font id: 0
  631. -- text size: 12
  632. -- style flags: 0
  633. -- line height: 16
  634. -- part name: qt to fl oz
  635. ----- HyperTalk script -----
  636. on mouseUp
  637.   get card field "Display"
  638.   set numberFormat to 00.00
  639.   put it * 32 into card field "Display"
  640.   put "fl oz" into card field 2
  641. end mouseUp
  642.  
  643.  
  644.  
  645. -- part 37 (button)
  646. -- low flags: 00
  647. -- high flags: A004
  648. -- rect: left=155 top=112 right=134 bottom=240
  649. -- title width / last selected line: 0
  650. -- icon id / first selected line: 0 / 0
  651. -- text alignment: 1
  652. -- font id: 0
  653. -- text size: 12
  654. -- style flags: 0
  655. -- line height: 16
  656. -- part name: fl oz to qt
  657. ----- HyperTalk script -----
  658. on mouseUp
  659.   get card field "Display"
  660.   set numberFormat to 00.00
  661.   put it / 32 into card field "Display"
  662.   put "qt" into card field 2
  663. end mouseUp
  664.  
  665.  
  666.  
  667. -- part 38 (button)
  668. -- low flags: 00
  669. -- high flags: A004
  670. -- rect: left=87 top=112 right=134 bottom=148
  671. -- title width / last selected line: 0
  672. -- icon id / first selected line: 0 / 0
  673. -- text alignment: 1
  674. -- font id: 0
  675. -- text size: 12
  676. -- style flags: 0
  677. -- line height: 16
  678. -- part name: l to qts
  679. ----- HyperTalk script -----
  680. on mouseUp
  681.   get card field "Display"
  682.   set numberFormat to 00.00
  683.   put it * 1.057 into card field "Display"
  684.   put "qts" into card field 2
  685. end mouseUp
  686.  
  687.  
  688.  
  689. -- part 39 (button)
  690. -- low flags: 00
  691. -- high flags: A004
  692. -- rect: left=243 top=85 right=106 bottom=318
  693. -- title width / last selected line: 0
  694. -- icon id / first selected line: 0 / 0
  695. -- text alignment: 1
  696. -- font id: 0
  697. -- text size: 12
  698. -- style flags: 0
  699. -- line height: 16
  700. -- part name: qt to cups
  701. ----- HyperTalk script -----
  702. on mouseUp
  703.   get card field "Display"
  704.   set numberFormat to 00.00
  705.   put it * 4 into card field "Display"
  706.   put "cups" into card field 2
  707. end mouseUp
  708.  
  709.  
  710.  
  711. -- part 40 (button)
  712. -- low flags: 00
  713. -- high flags: A004
  714. -- rect: left=242 top=112 right=133 bottom=319
  715. -- title width / last selected line: 0
  716. -- icon id / first selected line: 0 / 0
  717. -- text alignment: 1
  718. -- font id: 0
  719. -- text size: 12
  720. -- style flags: 0
  721. -- line height: 16
  722. -- part name: cups to qt
  723. ----- HyperTalk script -----
  724. on mouseUp
  725.   get card field "Display"
  726.   set numberFormat to 00.00
  727.   put it / 4 into card field "Display"
  728.   put "qt" into card field 2
  729. end mouseUp
  730.  
  731.  
  732.  
  733. -- part contents for background part 1
  734. ----- text -----
  735. Conversion Calculator
  736.  
  737. -- part contents for card part 34
  738. ----- text -----
  739. Units         Definition
  740. g (grams) = .035 oz
  741. oz (ounces) = 28.35 g
  742. mg (miligram) = .001g
  743. 1 lb (pound) = 16 oz
  744. 1 kg (kilogram) =
  745.       2.21 lb = 1000 g
  746. 1 Tbsp (tablespoon) =
  747.       3 tsp (tea spoons)
  748. 1 fl oz (fluid ounce) =
  749.       2 Tbsp = 29.6 ml
  750. 1 l (liter) = 1000 ml =
  751.       1.057 quarts
  752.